home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 19p2.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-05  |  1.9 KB  |  68 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState
  3.   puppetSprite(48, 1)
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "19p2"
  7.   gKnobState = 1
  8.   puppetSprite(gKnobSprite, 1)
  9.   setUpKnob()
  10.   set the mouseDownScript to EMPTY
  11.   set the mouseUpScript to EMPTY
  12.   sprite(34).visible = 0
  13. end
  14.  
  15. on stopMovie
  16.   when timeOut then nothing
  17. end
  18.  
  19. on idle
  20.   global gCursorReady
  21.   if gCursorReady = 1 then
  22.     cursor(200)
  23.     checkCursors()
  24.     set the locH of sprite 48 to the mouseH
  25.     set the locV of sprite 48 to the mouseV
  26.     updateStage()
  27.   end if
  28. end
  29.  
  30. on checkCursors
  31.   global gMagCursor
  32.   gMagCursor = "magCursor"
  33.   set the castNum of sprite 48 to the number of member "curs1"
  34.   if the castNum of sprite 5 and rollOver(5) then
  35.     set the castNum of sprite 48 to the number of member gMagCursor
  36.   end if
  37.   if the castNum of sprite 6 and rollOver(6) then
  38.     set the castNum of sprite 48 to the number of member gMagCursor
  39.   end if
  40.   if the castNum of sprite 8 and rollOver(8) then
  41.     set the castNum of sprite 48 to the number of member "deMagCursor"
  42.   end if
  43.   repeat with i = 15 to 17
  44.     if rollOver(i) then
  45.       set the castNum of sprite 48 to the number of member "hotCursor"
  46.     end if
  47.   end repeat
  48.   if the castNum of sprite 20 and rollOver(20) then
  49.     set the castNum of sprite 48 to the number of member "hotCursor"
  50.   end if
  51.   repeat with i = 30 to 32
  52.     if rollOver(i) then
  53.       set the castNum of sprite 48 to the number of member "hotCursor"
  54.     end if
  55.   end repeat
  56.   if rollOver(34) and (sprite(34).visible = 1) then
  57.     set the castNum of sprite 48 to the number of member "hotCursor"
  58.   end if
  59.   repeat with i = 40 to 42
  60.     if rollOver(i) then
  61.       set the castNum of sprite 48 to the number of member "hotCursor"
  62.     end if
  63.   end repeat
  64.   if the castNum of sprite 47 and rollOver(47) then
  65.     set the castNum of sprite 48 to the number of member "hotCursor"
  66.   end if
  67. end
  68.